home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / inputout / function / mouse / button.scr < prev    next >
Encoding:
Text File  |  1994-08-02  |  300 b   |  15 lines
  1. @thread MM1.LOG
  2. @NewAlias mm MOUSE.GRA
  3. mm LOG $PROMPT="MOUSE PRESS/RELEASE SCRIPT"
  4. mm set BUTTON=0
  5. mm MOUSE_GETBPRESS
  6. mm set BUTTON=1
  7. mm MOUSE_GETBPRESS
  8. mm set BUTTON=0
  9. mm MOUSE_GETBRELEASE
  10. mm set BUTTON=1
  11. mm MOUSE_GETBRELEASE
  12. mm set HMAX=0
  13. @flush mm
  14.                                  
  15.